﻿Imports Microsoft.VisualBasic
Imports Microsoft.VisualStudio.TestTools.UnitTesting
Imports extremo
'''<summary>
'''This is a test class for DeporteNegocioTest and is intended
'''to contain all DeporteNegocioTest Unit Tests
'''</summary>
<TestClass()> _
Public Class DeporteNegocioTest


    Private testContextInstance As TestContext

    '''<summary>
    '''Gets or sets the test context which provides
    '''information about and functionality for the current test run.
    '''</summary>
    Public Property TestContext() As TestContext
        Get
            Return testContextInstance
        End Get
        Set(value As TestContext)
            testContextInstance = Value
        End Set
    End Property

    '''<summary>
    '''A test for insertar
    '''</summary>
    <TestMethod()> _
    Public Sub insertarTest()
        Dim oDeporte = New DeporteNegocio
        Try
            oDeporte.insertar("C", "U", "d", "7", "c", "2")
        Catch ex As Exception
            Assert.Fail(ex.ToString)
        End Try
    End Sub

    '''<summary>
    '''A test for obtener
    '''</summary>
    <TestMethod()> _
    Public Sub obtenerTest()
        Dim oDeporte = New DeporteNegocio

    End Sub

    '''<summary>
    '''A test for buscarPorNombre
    '''</summary>
    <TestMethod()> _
    Public Sub buscarPorNombreTest()
        Dim oDeporte = New DeporteNegocio


    End Sub
End Class
